Software Para Spectrum Magazine (Spain)

>ARA UNA BUENA CARGA
)EL PROGRAMA EN TU ORDE-
JADOR, COMPRUEBE .
1UE LA CABEZA DE SU á
‘LATINA ESTE
.IMPIA Y EL
VZIMUTH PERFECTA
CIENTE AJUSTADO.

LIMPIELA CON EL
PRODUCTO
SKUA.

b

c?

e>

LIMPIADOR DE RADIO CASSETTES

BOLETIN DE PEDIDO

Nombre yApellidos..

Dirección ...

Ciudad.Telf.D.P.

Deseo recibir. Limpiadores de cassettes al precio de 420 Ptas. Unidad.

Forma de pago: □ Talón □ Contrareembolso □ Giro postal

Remitir a GTS, S. A. - Bailón, n.° 20 - 1.° Izda. D.P. 28005

Queridos lectores

^^onno os anunciábamos en el número anterior, ¡a
revista de este mes lleva algunas modificaciones. La
hemos estructurado en 3 partes.

La primera es e! listado de los programas de este mes.
De esta forma podéis ver como se han elaborado, e
incluso podéis variar e intentar mejorarlos, con lo que
conseguiréis conocer y dominar mucho mejor vuestro
Spectrum,

Qs encontrareis también con la sección de “IDEAS”, en
ella os mostramos esos trucos siempre tan necesarios.

Una página de bibliografía con los últimos libros
publicados sobre el Spectrum.

Y una encuesta que nos ayudará a conocer vuestros
gustos, para seguir la línea de tus preferencias.

Por favor, remitírnosla a nuestra nueva dirección:

EDITORIAL GT.S, S.A.

C/. Bailén 20, 1.° Izda. 28005 Madrid

■ ■

Edita: Editorial GTS. C Bailén. 20. 1" ¡Jdf* 2R005 MADRID
Secreta tía Redacción: N Vera Clavija Colaboradores: Eugenio Garrido, J F Martínez.

J, Bemal. R. Carralón, J Rarti'es. Juan Jesús Ortega. Dirección Artística y Técnica: Jesús Negreta
Publicidad: Opto, propio Avda Mediterráneo. 4?. * " C. 78007 MADRID Fotocomposiclón:
Werrata. S. A. Alejandro González. 7 28028 MADRID Imprime: Gráficas Futura, Sdad. Coop. Ltda
Producción cassettes: Mjfirüfón, $ A Distribuye: Dl$PREN1>A Poiig. Industrial Codein. Fyenlabrada MADRID
Tino. 6904001 Depósito Legal 0 1323 SS

Editorial .

Explicación de los programas

Cuestionario Librería .

Libros ..

Ideas .

mim

EXPLICACION

I IF INKEY*^- QR IHKEYf-'S 1 THEM 60 TO 99??
é FOR a=? TO 21: PRINT ilT 3,0;* 'iAI a,23i‘ 4 : NEKT a

7 PRINT AT 20,0,,,,

8 RESTORE 4: BATA 60,102,94,94,94,126,94,126,0,234, 183,253,253,255,254,0: FOR
&=US« *a # TO U5R ‘cM; RÉAB v: POKE n f v; NEKT n

10 LET a%«■ PARA LA CINTA BISPARA LA BALA ROJA COANDO ESTA CO

INCIDA CON LA FLECHA, SI DISPARAS UNA NEGRA, PERDERAS UNA VUA.... PUL

5A < SPACE > PARA DISPARAR..é SUERTES!»

12 FDR H=1 TO LEN A**3l; PRINT AT Zl^iAflN TO N+31K ÉEEP 1/100,10: PAUSE 10:
MEXT N

20 LET P-0: LET V=3
BO BEEP 1/2,I0: ÍEEP 1/20,30
90 LET B=iNT EfiNHÓJ
95 BO SUE 900

ICO PRINT 09ER li PAPER BJ AT IÍ,BH2; IKK Oi 1 ’i INK 2i' 1
120 LET B=B*i; BEEP 1/25,10! IF B>5 THEH LET B=0: PRINT OVER lí PAPER 8i INK Oi
AT ifijlSí 1 1

130 IF INKEYi 2 " 1 THEM 60 TO 300
200 60 TO 100

300 IF B=3 THEN LET HM+INT 1RNDI99ÍI LET P=P*H; LEI Bf=‘ “*STW H+* PUNTOS

i

301 IF B<>3 THEN LET B*=‘ R.I.P. *1 LET 9=Y-L

310 FOR N=20 TO 30: PRINT AT 10,NíB»(N-l9ii■?': ÉEEP 1/lOOjH: PAUSf 2: NEXT H!
PRIHT AT 10,315* *

320 ÍF VíO THEN 60 TO 1000

330 m N a l TO 10: ÍEEP I/100,H: PAUSE Ü-N: BEEP i/100,10-N: NEKT N
340 PRINT AT 10,20,

350 60 TO 80

600 LET At-STW Z: LET 2S=‘60Q000 4 : L£T ZWK TO 6-LEN ARETURN
900 LET Z-P: 60 SOI 300: PRIHT AT 15,22! f PT:’iZII LET Z*V: BO SUE 800: PRINT ¡A
T 17,22*‘Vi:-íZ*¡ 1 ■: RETURN

1000 BEEP 1,-10: LET Al=' GANE OVER PREPARATE PARA UNA HUEV

A PARTIDA 50 TO 12

9999 SAVE •REVOLVER"COD€ 16384,PEEN 23627t256lPEE« 23628-I63B2: GO TO 1

DE LOS
PROGRRHRS

4

wivw>U

PT : 0

BD:45 ■

% !

"W .....■i

,:-a __ *■

" Q .,,-n-o, *

=.*í g " ]fff I ***

kj • I Jh I? ■ ■

|o PÑ5ILLO ¡

MORTRL I]

s

I

a

su

a

i

KT. ’TjSÉL 'Vj^f

E”3

a

*■

f

PUNTOS:

RECORD:

TIEMPO i

0

50

378

CRUZA EL PB5ILLQ
DE LA MUERTE SIN
QUE TE ALCANCEN

LAS PIEDRAS

TECLAS;

X-IZQ. P-DER.

PROCURO COMER EL
HOYOR HUMERO DE BO¬
LOS QUE CO EN DE
ARRIBO, PORO MOVER¬
TE USO:

I : ■£ P : e£

1 IF IWCEY§=Y THEN GÜ TO 9999

2 as : PRINT AT 10, HIPARA LA CINTAS PAUSE 200: LET R=0

5 CLS : DATA 36, 102,167, 157 p 255,191 ,94,60,0,0,24,44,00,24,0,0: RESTORE 5: F0R
t=USR V TO USR 'c'-U READ lli PÜKE z,zi: NEXT i
h PRIHT FLASH 8¡AT 21,5!'PULSA (S> PARA EMPEZAR"; lf IRKEY*= , s l TH£H SO 10 B
7 00 TG 6
@ LET HJSR 21370

10 CLS : LET C=Ül FOS Z=1 T0 20: PRIRT AT Z,Q¡ FLASH lí IWVERSE C¡ PAPES 2¡‘ 1
iAT Z,3ií 1 *íAT 2,1; INVERSE Oí FLASH Oí PAPER 3S' "Í*T Z,23S-

LET C=e+i: IF DI THEN LET DO
LZ HEXT Z

13 PRINT AT 0,05*? ??????????????? 1

14 PRIHT AT 21,0;' ????????????????'

15 LET X=19; LET LET B0=50: LET P=0
&0 LET XB=U UT YB=9*IHT LRNDÍ14Í

90 G0 SUS 500
95 LET MSR 23430

100 PRINT AT XEjVB;' LET XE*XltJ; PRINT AT XB,YE!

110 PRINT AT t t yV ’í IF lHKEYf= J i 1 THEN LET y=y-l¡ IF y<9 THEH LET y=9

111 IF IiKEYí=V THEN LET y-yH\ IF y >22 THEH LET ? =22
120 PRIHT BRISKT HAT x,?; *?"

130 IF i=Jb THEH IF y=yb THEH LET T=USR 23340: LET p=p+l: 80 T0 200
140 IF sbH? THEH LET 3=USR 23460: SO T0 200
190 60 TO 100

200 PRIKT AT *í LET bO=b(H: IF bo<0 THEH 60 T0 1000

202 LET íb-H LET yb=9UNT IftNDfl4l: 80 SUB 500: 80 T0 100
500 PRINT AT 4,2í"PTi'jPjAT 4,25;"BO!'?BGit 1 1 AND BÜÍlOl
505 fiETURN

1000 PRINT AT lOjlií l SAHE OVES 1

1005 POR z=l TC 5: LET MSP 23370: LET MSR 23400: HEXT z: GO TO 6
9999 3AVE 1 GLOTON'CGDE 16384,PEEK 23627+256TPEEIÍ 23620-i£382: 60 10 1

1 IF 1NKEYS="g É THEH GG TQ 9999

2 CLS : LET r=0: PRINT AT 10,101"PARA LA CINTA": PAUSE 200

3 PÜKE 23693,71: BURDER 0: CLS
5 PDXE 23675,0: PÜKE 23676,91

10 PRINT PAPER 7? INK 2}AT 0,0i *???????????????????????????????? 1 ¡AT 15,01'???
?????????????????????????????*: FOR N“1 TO 12: PRINT PAPER 7! INK 25AT N f 0¡"?"í6
T N f 3l;'?"I NÉXT H

12 PRINT INK 5IAT 13 t Qi‘7‘íAT Í3«31i fl ? H lAT lA.Oi^'íAT H,Jli # ? É

14 PRINT INK 3jfcT ¿6,01*????????????????????????????????*iAT 21,Oí'???????????
?????????????????????': FÜR N=17 TO 20: PRINT INK 3iAT H,C¡“?'?AT H,3I¡HEXT

15 PRIHT AT IB, 2¡‘PUNTOS: RECORD: TIEMPO:"

16 PRIHT AT i?,ZrO-;AT 19 f 12ir

20 LET t=500: LET 4=K LET p=Q: LET X=14: LET M! DIN R(14,21
25 FOR N=1 TG 14: LET H=2fN: LEÍ I=UIHT (RNM14): PRINT AT I,H|*??': LET RtN,
U=I: LET R!H P 2DH: EEEP 1/50,0: NEXT N
90 LET j=31: GO SUB 9040

100 IF INK£Y*=-p- THEH GÜ SUB 9000: LET y=y*l: GO SUB fOlü: PRIHT AT i^i'Z'iAT
x-l^i"? 1

105 IF INKEVI =, i* THEH 60 SUB 90001 LET r = r i: 60 SUB 9010I PRIHT AT *,*i , ? l iA!

t-iav?'

110 IF y)l AND y(30 THEN IF rUHT íy/2> ,!>=)< GR rUHT iyt2) p ü=3C-£ THEH GÜ TÜ 5
00

120 LET h-IMHT 1RHDÍ14K PRINT AT r(fc,n,r(h,2)í" "1 LET ríh,I)=rlh, 11+1: IF
r(b,mi4 THEH PRIHT AT HjHMJí 1 ??": BEEP 1/70,-10; PRINT AT 14,r[h,2)r '1
LET r(h,£J-j

122 PRIHT AT rth,1},r(h,23;"??"

130 LET tH-í: IF UÚ THEN GO TÜ 500
132 PRIHT AT 19,25;tí' "

140 IF 6=1 THEN IF y-Z 0 THEN LET p=p*50: LET 6=2: PRINT AT 19 f 2íp: BEEP 1/2,101
EEEP 1/10,30: LET j=C: SO SUB 9040

145 IF 6*2 THEH IF y=I THEH LET p=p*5Q: LET 4=1: PRIHT AT 19,2¡p: BEEP 1/2,10:
BEEP 1/10,30: LET i*3lí 60 SUB 9040
ZOO GO TO 100

500 IEEP 1,-10: FOR n=l TQ iil BEEP 1/50,n+10: PRIHT AT 13,yi INK 6-n/2¡'?'¡AT
14,yi"? 1 : PAUSE 12-n: BEEP 1/50,10-ní NEXT n
600 IF p>=r THEH LET r=pl FOR n-í TO £0 STEP 3: BEEP l/50,n: NEXT n
700 PRIHT Alí'OTRA PARTIDA? IS/H) 1

800 PAUSE 43: BEEP 1/50,30: IF INKETDV THEH RANDDHIZE USR 0
805 IF INKEYDV THEH 60 TO J
BIO 60 TC B00

9000 PRIHT AT x t yV "íAT j-I,yí É 1

9010 IF y >3Ü THEH LET y=30

9011 IF yíl THEN LET y=l

9012 RETURH

9040 FÜR n=l TG I0í BEEP 1/50,n: PRINT QVER 1}AT lSJí'P'íAT 14,jl'?': PAUSE 10-
n; BEEP 1/50,10-n: HEXI a; RETllRN

9999 SAVE 'PASILLÜ'CODE 1Ó384,PEE!Í 23fi27^5£ÍPEEK 23620450-16354; GO TÜ 1

5

PT:60 RC:0 FRSE:2 UI:£

DIRIGE R LO SERPI¬
ENTE PORO GUE COHR
LOS TRRROS DE HER-
KELRDO Y EVITE LOS
VACIOS.TECLOS:

0:fr Z :■& I :*> P:c*

1 IF INKEW**9' OR HKETN'S* THEN 60 TO 9999

2 CLS : PRINT Al 10,10;TARA LA CINTA'; PAUSE 200: LEI B=0: CL5

5 PRIHT AI 21,01’ PULSA (Sí PARA EKPE2AR V If INKETS=*s' TH£H CLS :

eo ro jo

é

6Q ;o 5

10

LET v=3: LET p=Ü: LET f=l

§0

LET C=0: LEI d=l: SO SUB 1000

P

?ü

LET 1 o=Ü: LET ai="l LET *=10; FOR

II

“i

O

IF ATTR

lx,j]=3 THEN LET :=c

♦I

?i

PRINT IKK £ i AT x,y¡'?": LET ai=aí*CH« *Km

f. NEXT j

'1 LET y=y-l

100

IF INK€Y*=-q B THEN LET d=2

101

IF INKEYfs'z' THEN LET d=3

102

IF MEYf=V THEN LET d=4

103

IF 1HK£ YS="p" THEN LET 4H

no

IF d=i THEN LEI y=y+1

m

IF 1=4 THEN LET y=y-í

n;

IF 1=2 THEN LET *=x-I

:n

F d=3 THEN LET

115

LET at=ai*CHRf x+CHRf y

120

IF ATTR íx, ¡rí=58 THEN 60 TO 300

121

!F ATTR <x,yí=3 THEN LET c=c*lLLET

1d=4: LET 1

t=USR 23340: LET p=p*5: PRINT

AT 21,3;p: LEI >p=ltRRSílí; LEI yp*l*RNM29: IF SCREENS íJtp,ypl =1 * THEN PRINT
INI! 7¡AT «p,yp¡'7‘

122 IF c>*10 THEN 60 T0 2S0

123 If ATTR I>,yl=6 THEN 60 T0 300

124 IF ATTR < x,y)=71 THEN 60 TU 300

130 PRINT AT X,j! IKK i;*? 1 ! INK 7;AT COOE atlll,COÍE al(2)¡* 1
135 IF loíO THEN LEI lo=lo-l
MO IF ¡0=0 THEN LET a*=a*l3 TO 1
200 60 TO LOO

250 LET !=USR 23430; LET 4=H¡! 60 TO 20

300 LET l*USR 23440! LET v=v-ll !F *<0 THEN SO 70 400
305 60 TO 20

400 PRINT AT 9,11¡‘6AKE OUER'l FOR a=l TO Si LET 1=USR 23400; LET 1=U$R 23370;
NEXT a

410 IF p>r THEN PRINT AT 11,101‘NUEVO RECOMI'

420 60 TO 5

1000 60 SUB lioo; PONE 23693,7

1001 IKK j: FOR 1=1 TO 10

1002 LEI s c J * INI IRNÍ4J8): LET y=UINT IRN1129I; IF xOlO AND SCREEN* tj,yl=‘ •

THEN PRINT AT BEEP 11100,20: NEXT z¡ 60 10 1010

1003 60 TO 1002

1010 INK 7! PRINT AT 21,9; , PT:'iF!AI 21,101‘RC;-;R¡AT 21,20;'FASE; , ¡F¡AT 21,28¡'

vi:*ítf

1099 REIURN

1100 BORBER 0: PONE 23693,7: CLS I PONE 23693,58; PRINT AT C,0¡ , ?'’”7??”?5 ,, ”?7

¿9,05 ^: FQR i -1 TO 18: PR

INI AT ijOi^iAT i,W'Vi NEXT i
1102 If H2 TWEM RETURN

1110 FOR r=l TO B: PRINT AT i f ifl; , ? , ¡AT z+lO^lOíIF *>2 THEN PRINT AT t t 2U*
7'íAT í+IOíZU 1 ?*

1112 NEXT 2 : IF f<4 THEN RETÜRH

1120 FOR i=3 TO 16t PRINT AT z J 5í , ? , í IF 04 THEN PRINT AT z f 26¡ ir

1121 NEXT 2

1125 IF 05 THEN PRINT AT 3,141“????-

1126 IF f>é THEN PRIHT AT 16,14i*????*

1200 RETURN

9m SAVE *SERPIENTE 1 CODE 16334 p PEEK 23627t?56fPEEN 23628-16362: 60 TO 1

ESTE PROGRflHR HIDE
TU VELOCIDAD |>E ES-
CRITURfl EH TU ZK,

Y EVflLUR TU QftPHC1 -
DRE> DE HECftNOGRftFO.
CRRGRNDO

6

i IF INKETt^g" m INKEYf-'G 1 * THEN 60 TO 999?

l ECRDI.fi O! POKE 23893,7: CLS i PRINT IT 10*10i"PARA LA CINTA"! PAUSE 200: CL
S

10 PRIMT AT 0,0; 1 TEXT DE MECANOGRAFIA: 1 *it. m

15 RESTQRE lOOO: IF RNB>.5 THEN REAS i*

i? DEF FN tU = C¿553é*PEEK 2367«4+25é*PEEK 23673+PEEK 23872 W30

18 PRINT AT 2,1|"Preparado que «apenaos,... 4

J9 BEEP 2,10

20 REAS ai: LET aS=*1234S67B? *+il

30 PRINT AT 1,01a*: PRIKT AT 11,01"..—--- B |CHW 81

35 BEEP 1/5,30

38 POKE 23872,0: POKE 23873,0! POKE 23674,0

40 PRIMT IHKEYIi I PAUSE 60: IF FN tU>ÓO THEN SO TO 100

50 60 TO 40

100 PRIMT MIC OS 1 !'! PRIMT INK 3J"-*.—... 4

UO LET f*0! LET x=I2¡ LET y=0! FOR fl=l TO LEN i*

112 IF SCREENf ii í yl= 1 M l THEM 60 TO 200

113 IF SCREEMS lx r yK>iHní THEN LET t=tHí BEEP 1/50,20: PRUT BRIGHT 1JAI x J?

i dvee ir_-

114 LET j*y*U IF ?>3i THEM LET y=0: LET *=xH¡ IF 021 THEN LET x*2í

120 NEXT n

200 PRIMT OVER ijAT 1,0;**

210 PRIKT AT 2,0; 1 PULSACIONES......"iH

211 PRIMT : PRIMT 4 FALTAS..„'iF

215 LET Bf=* ESTAS SUSPENSO 1

220 IF KM49 THEN IF F<16 THEN LET B*= 4 * APRUEBAS EL I CURSO 1

221 IF M>200 THEN IF Fié THEN LET ll-'APRUEBAS EL 2 CURSO*

222 IF N>24? THEN IF F=0 THEN LET B*= 4 APRUEBA5 ÉL 3 CURSO*

230 PRIKT BRIGHT I ¡AI 7,16-lEN BI/21BI

240 FOR N=1 TO 300: N£XT N; PAUSE 43: PAUSE 01 RUN 10

1000 SATA 1 * En todos ios ejercicios del Netodo queda prohibido terainmteaente e
t tipleo de goa* de borrar, Cd»q sabe ios, los ejercicios decopia de escritos cor
rientes quecontengan aas de 5 faltas deben tintinarse por coipleto, y repetirse
integramente hasta conseguir tenas de 5 faltas, 4

1001 BATA 1 La pratica trae la perfección, se oye decir a veces, lo cual escoap]

etaiente incierto. Si una persona practica i»1, por ignorancia o por vicio, jaa
as lograra la perfección. Bebeaos, pues, enaendar lo dicho afi

raanda: La practica adecuada trae la perfección. 1

9999 SAVE "PULSACION'COSE 16384,PEEN 23627+256ÍPEEK 23628-16382: 60 TO 1

12 3 4 567 S 9

En todos los ejercicios de t Me t
odo queda prohibido terminan teme
n t e el empleo de goma de borrar.

Como sabemos., ios ejercicios de
copia de escritos corrientes que
contengan mas de 5 faltas deben
terminarse por completo, y repet
irse integramente hasta conseguí
r menos de 5 faltas.

CLASIFICA CflDR UHO
T>E LOS 20 IHSTRUH .
EN EL GRUPO OUE LE
CORRESPONDA:

CUERDA i UIEHTO O
PERCUSION...

PREGUNTA NUMERO’ 1

INSTRUMENTO: OBOE

fi CU R L DE LOS TRES GRUPOS DE
INSTRUMENTOS PERTENECE ?

1- CUERDA

2- UIENTQ

3- PERCUSION

i IF METIAS 1 GR INKETM'g" THEN 60 T0 9999
10 CLS : PRIMT AT 10,10;"PARA LA CINTA": PAUSE 200: CLS
15 POKE USR V,BIH Q001110Q

20 PRIMT AT 10,01" INSTRUMENTOS MUSICALES "1 FOR A=1 T0 30! BEEP 1/10,
RKBIÍO! HEXT A
90 LET AC=Q
100 FOR N^l TG 20

110 BEEP 1/2,10: BEEP 1/10,20! LET H=INT (RNBIJl! RE STORE lOOO+ÜOOiH)

112 REAS Rl,NUN

120 LET N1=INT (RNDÍNUPt): FOR A=1 TO Mi! REAS II! NEXT A
130 CLS ! PRIMT AT 21,0!* "iAT 0,01" IMSTRONE

MT0S MUSICALES "PREGUNTA NUMERO! É iN'"¡" INSTRUMENTO! 'i FLASH ÜJ*í

FLASH 0r'‘l CUAL BE LOS TRES GRUPOS BE 4 " * "INSTRUMENTOS PERTENECE ?‘" m i- CUEft
DA 11 *" 2- VIENTO"”" 3- PERCUSION"

140 IHPUT "GRUPO 11-31¡"SKI LET KMC-i

141 IF k(0 OR k>2 THEN BEEP 1,-10: GO TO 140

150 IF K=H THEN PRIMT 1 *‘CORRECTO "iR*: LET A[=ACH! BEEP 1,20! FOR A=0 TO 1501
OUT 254,A: NEXT A! BQRDER 0

151 ¡F ¡CON THEN PRIMT M "INCORRECTO.* 1 ""LA RESPUESTA ERA; "¡RV BEEP 1^-10: FO

9. A-I 10 51 BEEP i/10 r RNM10; NEXT A

190 NEXT %

200 CLS : PRINT 1 RESULTADOS! "¡IT 21,01" INSTRUMENTOS NU

BICALES

210 BEEP 1/2,10: PRINT A? 5,7;"ACIERTOS.*;AC;AT 7,?í"FALLOS.,¡20-AC

iAT 12,7!"PORCENTAJE: 'jttftf'V
212 BEEP 1/20,30

220 PRINT AT !9 f 7í"OTRA PARTIDA ES/N1"

300 PAUSE 43: BEEP 1/50,301 IF INKETI-'S" OR INK£Y*= , s" THEN RUN 20
310 IF INKEYf=V OR MKEYf='M" THEN RANDONIZE USR 0
320 60 TO 300

1000 BATA "CUERDA",13

1001 DATA "VIOLIN","VIOLA","VIOLONCELO","CONTRABAJOVLAUbVGUITARRA","BANDURRI
A 1 ,"BANJO*,"ARPA"/CITARA", "CLAVECIN", "ESPINETE",. "UKELELE"

1100 BATA "VIENTO*,23

1101 DATA 1 FLAUTA",'FLAUTIN YOMYDULZAINAyTÉNORAV CLARINETE VFASOT Y CAR
ANILLO","TXISTU", 'GAITA 1 , "TROMPA*,'TROMPETA',"CLARIN","TROMBON","CORNETA",* FIK6 L
A*, "BUSLE 1 ,"TUBA","CUERNO 4 ,"SAXOFON","ORGANO","ARMONICA 4 ,"ACORDEON"

1200 BATA "PERCUSION",15

1201 DATA "TRIANGULO","PLATILLOS*,"CANPANA","SONS","TAMBOR","BQNBG","TIMBAL 4 ,*PA
NBERETA", "MARACA","CASTA7UELAS", "PIANO","XILOFOMO","CLAVICORDIO*,"CELESTE","NARI
NBA 1

9999 SAVE "IHSTRUNEM'COBE 18384,PEEK 2362?r258IPEEK 23626-ÍÓ382: GO TO 1

7

ODY

1 ir iNKEK$=*6' QR INRETÍ=*9' Th
EN 60 T0 9999

10 PURE 23693,7: BORDES Oi 60 SUE 9000: PRINT AT 12,10¡'PARA LA CINTA 1 : PAUSE

CARGANDO

COMPONE CON HELODV
DE LA FORHA HAS FA¬
CIL.» LAS HELODIAS
QUE DESEES.

200

20 DIN AID: LEI N=!

100 60 SUB 9000

DO PRINT AT S,Í2;* MENU ’¡AT li,8¡’l- CREAR MELODIA'iAT 13,3¡’2- ESCUCHAR M
ELUDIA" (AT 15,81'3- GRABAR MELODIA'5AT 17,8¡*4- CARGAR MELODIA*;AT ¡9,8;‘5- FIN
ALIZAR’

120 IF IMCE?*='r THEN SO TO 1000

121 IF INKEy$=’2' THEN 60 TC 2000

123 IF 1MKEV*='3* THEN 50 TO 3000

124 IF INKEY*='4' THEN SS TO 3500

125 IF INKETÍ^Í' THEN RANDGMI2E USR 0
130 60 TO no

IODO 60 SUB 9000: INPUT 'LONGITUD DE LA MELODIA:*íH: INFUT 'DURACION EN SEG.DíD
1010 DIN AíN)

1020 PRINT AT 9,0¡’ AHORA A CADA TECLA DE TU MICRO "■'TIENE ASIGNADO UN SONIDO
CORRES-"" PONDIENTE A SU <C0DE?'

1030 FÜR B=1 TO N: FAÜSE 0! LET AtB!=COD£ INKEYÍ-SO: PRINT AT 21,0,'NOTA:’;B,'VA
LOR: "AIB),: BEEP D.AIBK NEXT B

1040 60 SUB PODO: FRIN7 AT 12,71 'MELODIA FINALIZADA’: FOR B-l TO 500: HEXT E: 60

TO 100

2000 60 SUB 9000: PRINT AT 12,6;'REPRODUCIENDO MELODIA’

2010 INPUT 'DURACION EN SE6.:'¡D

2012 FOR B=1 TO N: BEEP D.AtBi: NEXT B: SO TO 1040

3000 60 SUB 9000: INPUT 'NOMBRE:" LINE A$: PRINT AT 8,01"PULSA RECORD*: SAWE A*
DATA Al): PRINT : PRINT "VERIFICANDO "AS: VERIFT Ai DATA Allí PRINT í PRINT *0
R. ';Aí;' GRABADO.'

3010 FOR B=I TO 500: NEXT B: 60 TO 100

3500 60 SUB 9000: INPUT 'NOMBRE:" UNE Aí¡ PRINT AT 8,0;'PULSA PLAY*: LOAD AS D
ATA Al): PRINT ’0K. * i ASi * CARGADO.': 60 TO 3010

8999 PAUSE O

9000 FOR 1=6 TO 21: PRINT AT z,0,,: HEXT z: RETURN

9999 SAVE 'MELODY'CODE 16384,PEER Z3627*256*PEEK 23628-16382: 60 TÜ 1

8

r

m m mmm

DIBUJO EliPLEBHDO.
CIRCULOS. TECLRS:
O : if P ;«*• Z:Q 1:4=
S : SflUE POHTOLLO
LSLOOD PflHTftLLfl
R : IHICIRLIZRR

1 IF lHKEY*='g* THEN 60 T0 999?

2 print at io^ lo; ‘para la cinta*: pause 200: cls

10 INPUT ‘BORDES,PAPEL,UNTA:'jíj , ; , JPí , : , ¡T! BORDES B! PAPER PI INK T! CLS !
PLCT 0,0: ORAN 255,0: OSAS 0,175! DRAH -255,0: DRAN 0,-175: INPUT 'X!*)X,'Y:'¡Y!
Ik D, j T -RADIO DEL CIRCULO:*;S: INPUT ‘PASOUiP
100 1P INKEV*=*I‘ THEN LET «y-p; IF y(0 THEN LEI y=0
102 -F INKETÍ="q' THEN LE' y=y*p; IF y>!75 THEN LET y=175
104 IF INKEYi-'i' THEN LET *=s-p: IF x<0 THEN LET x=0

106 IF INKEY$=‘p* THEN LET IF *>255 THEN LET *=255

107 IF INKE^’r' THEN 30 TO ¡0

108 IF INRE^'s* THEN INPUT at: ?AVE aíSCREEN*

109 IF INKEY$="I' THEN INPUT a*: LOAD aíSCREEN*

110 CIRCLE it,y,i>

200 60 TO 100

9999 SAVE ’CIRCLERAHA'CÜDE !6384,PEEX 23é27*?5éfFEEK 23628-16382: 60 TO 1

9

1 1F IKNEYI=’S* OR INKEYt='<¡’ THEN 60 TO 999?

2 CLS : PRINT AT ÍO,10;'P4RA LA CINTA*! PAUSE 200: CLS

5 1NPUT ’PAPEL.BORDEJINTAl'lPi'l’IBl'l'iT: PAPES P: B0R3EF E: INP !; CLS
10 INP1T ‘GROSOR I! TG 40!:*;G: INPUT ’AHCrO [Q-«0!:*|Í1, ‘ALTO ¡0-4C.I:';v•: IN
FUT * CONCENTRACION ÜO-lOQIl’iC
» CLS

ICC FCR A=C "O 2tfJ 3-EP PNC
110 LET x=CGS Aív¡: LET V =SIK At'I
120 CISCLE !*í27,y«87,S
130 NEr 4

l«c 3W ’S-SAVE R-ENPEZAR F-FIK OPCION ‘¡ UNE AI
145 POKE 23658,8

150 IF A*=*S’ THEN INPUT ’NONBRE:"¡í*: SAVE ÍISCREEN*

151 IF »«=■(“ THEN 60 10 10

152 IF 41=’F' THEN RANBOMIE USR O
1K 60 TO 140

9999 540E ’ÍONSTS'CODE 16384,PEEN 23627*25S1PEEK 23428-16332: GO 'O 1

1 IF IHKET*= J g‘ OS 1W(ETI=’S’ THEN SO TO 9999
5 GO 308 900: PR1NT AI 12,101‘PAPA LA CINTA': PAUSE 200
10 80 SUB 900: PRIHT AT 8,01’EL SE NONES Aí CS, ES UNA 5UBRUTINA” "EN C/N REUBi;
ASLE.'''‘ESTA RUTINA RENONER» A PARTIR JE*’"LA LINEA S CON UN INTERVALO 3t I' '
'TOOOS LOS: GGTü,SQSilB|U$T,LLI5T" ' 'RESTORES,5AVE,. ,LINt,ETC,..'

20 80 SUB loco; 80 SUB 900

25 PRINT AT 8,01'PARA USARLA HAZ! "''3- PRIAERA LINEA A SENUNERAR" ‘*1- INTEíi
ALO ENTRE LINEA Y LINEA' ’ ” 'PONE 26286,1; PONE 26288,5-254T INT (SI2561‘.PONE 2e2E
9,3NTiS/256!'

30 SO SUB 1000: GO SUB 900

40 PRINT AT S.Oi'BATOS SOBRE LA RUTINA!" "INICIO: 26000"’ ’LDMITUL: 6S3 B«t
ps ,M 'FINAL: 26680’”'USO: RANÍ0NI3E USR 26000’ M, CAR6A: CLEAR Z5999;LÜAD‘"'CG¡
E '¡AT 21,01’DESEEAS GRABARLA APASTE? IS/N)’

50 INPUT UNE AI: IF A*=’S' O* A*=V THEN GAYE ’RENUNERA’COÍE 26000,661
60 AS=’N' OS A*=’THEN RAH00NI2E USR O
70 GO TO 10

900 FÜR 2=7 10 21: PRINT AT 2,0,,: NEXT 2: SETURN
IODO PRINT AT 21,01'PULSA UNA TECLA FARA SEGUIR))!»"

1010 IF INNEYIO" THEN BEEP 1/2,101 BEEP 1/20,30: RETURN
1020 63 TO 1010

=999 SAVE ’RENUNERA'CODE 16384,10300: 80 TO 1

10

DESCUBRE EL AS DE
TREBOL DESPUES DE
QUE EL ORDENADOR ,
BARAJE LAS CARTAS

CRRGAHDO

1 IF BKEÍt*'S* OR IHKET*=*9* IHEK 60 TO ÍÍW

2 60 SUB B1Q61 PSiRT « 12,101'PARA LA CINTA'! PAUSE 200

3 POSE 23475,0: POKE 23474,91

10 0IN «13,21; LET LET «12Í=*5?*; LEI

20 LET P=ü: LET VIMOS SO SUB 9100

30 PRINT AT T.Si'PT:*!: LET Z=P: 60 SUS 9200! PftINT Z*¡AI 7,201*VI:"i! LEI 2=9
I: SO SUB 9200: PRINT ZS! SO SUB 9050

35 IF 91=0 IHEK PRINT AT 21,101'SANE AVER': FQR N=1 TO 255: OÜT 254.N! KEXT N
: SORBER o: SO TO 20

40 LET v=l! FOR n=l TO 3: 60 SUB 1000; NEXT n
SO PRINT AT 21,4;'ELI6E TU CARTA 11-31:'

60 PAUSE 0! LET Z*=INKEY*: BEEP 1/50,30: IF ZS<' 1' OR ZIX'3' IHEK SO TO SO
45 PRINT AT 21,0,,

70 LET N=VAL 2t: LET Z=VAL IBÍIH1I: LET V=0: 60 SUB 1000
72 IF D*(Z,1)=■1* THEN BEEP .5,10: BEEP .5,12: BEEP .5,111 BEEP ,5,10! BEEP 1,
9: LET P=P*lNt IRNM20HJ

75 IF BUZ, 1)0*1' THEN BEEP 2,-10: LET VI=VI-I: FOR H=¡ TO 3! LET 9=0! 60 SUB
10A0: BEEP 1/2,N: HEXT H: FOR N=l TO 150: NEXT N: BEEP 1/50,30: POR N=1 TO 3: L
ET 9=1: 60 SUB lOOO: BEÍP 1/100,0: HEXT N
SO 60 TO 30

1000 LET 1=10: LET y=24t4ín>: LEI «=«IVAL btinl) : 60 SUB 9000: PRINT AT 1*7,y*
1¡ PAPER irO*¡n! RETURN

9000 IF 9=1 THEN PRINT PAPER 75 INK 2¡AT «.y}*????'¡*T i*I,yí*????'?AT *+2,yí'??
’P'IAT *i3,y¡*????'¡AT fH,y¡'??P?*iAT JO-S,?!*????*

9010 IF 9-0 THE* PRINT PAPER 7;AT *,yi* '1 IKK OicíllliAT )<t3 p yj■ 'i INK 2¡C

*42) í AT *♦ 2, y i * ' I AT x«3,yí * '¡AT *t4,y¡rt(ZI¡' *¡AT x*S,y¡ IKK 0)«!1)¡

1 ■

9015 IF *=2 THEN PRINT PAPER QíAT í i7 ¡’ ‘JAT ' *jAT x*2 t y\' '¡AT

x+3,yi l 1 ? AT x*4,y í 1 1 i AT ^S^í* *

9020 RETURN

9050 LET bS="! LÉT a*=M23*; FOR i=J TO 3: BEEP l/ÍQ,RNOílO! LET b=l+IKT \mti
EN afk PAUSE b*5: LET b§=bt+iitb): LET a$=at[ TO b-maflb+1 TO 5! HEXT a
9052 RETURN

9100 FQR 1=6 TO l\\ PRtKT AT z,Q fJ ; NEXT i: RETURN

9200 LET Nt^OOOCQO'! LET ZÍ^STR* l\ LET ZS=HÍ1 TO Ó-LEN 2*5+21: RETURN

9999 SAVE p AS-TREBOL'CDDE UÍBAjPEEX 23627 + 256 ÍPEEK 23 Í 2 B- 1 É 38 Z: SU TO I

INTENTA LOGRAR CON
TU <RACING DAR> EL
HEJOR TIEHPO.
TECLAS:

I ! 4= P:^ 9 R
CARGANDO

□ P □ O □ □

□ □OOP □

□ O O O ü x □ o

u o o □ o o □

□ □□□□□□□□□□□□□□□□□□□□□□□□□□ □

Q □ □

a □ o

□□□□□□□□□□□□□□□□□□□□□□□□□□ o o
a p o

a p o

□ □

O P o

□ P o

□□□□□□□□□□□□□□□□□□□□□□□□□a P P

□ □ o

□ O P

a □oooppnpoappQpppopooppoopp p

□ S p

O P

^PPPPPnPPPOQDPPPQPPOPPOPPQPPODPF

I IF INKEY*= p g 1 THEN SO TQ 9999

1 CLS ; PRINT AT tO,IOS'TMRA LA CINTA 1 ! PAUSE 200: LET TR=99.99
3 RESTOSE 3: DATA 24,189,255,109,36,165,255,189: FOR n=USR V TO U5R 'V-i:
REÍD v! POKE ffl,ví NEXT n
10 POKE 23693,32: BGRDÉR 4! CLS

15 DEF FH TI) = 165536TPEEK Z3674*25éfPEEK 23673+PEEK. 236725/50
20 LET XB=20: LET YB=I2! LET X=20! LET T»I2: LET M0! LET C=i0
90 FOR efO TQ 21 ¡ PRINT AT r^Oj 1 ■; NEXT n

92 PRINT AT 20,9;' ?

98 PAPER 8¡ INK 8: BRI6HT 8! BEEP 1/2,10: BEEP 1/20,30

99 PAUSE Oí POKE 23672,0! POKE 23673,0! POKE £3674,0

100 IF INKEYÍ^q 1 THEN LET x=x-lí IF ti2 THEH LEI i*2

102 IF INKÉYt^a' THEN LET i=*Hi IF *>20 THEH LET i=20

104 F MEY**V THEN LET y=y- 1: IF yíQ THEN LET y=0

106 EF INKEY*=y THEN LET y=y+l: IF y>31 THEN LET y=3í

Í10 PRINT AT xb,yl)i* '|AT *,y¡*?'; LET xb=x: LET yb*y
114 IF ATTR THEN 60 TO 300

U5 ¡F ATTR (k, y 5 056 THEN BEEP 1/AÍTS t*,y) f 10: LET i=i* 1: IF i>20 THEN LET t=
20

110 LET I=USR £3296

120 LÉT c=CTRNH2-RNDi2: IF e>24 THEN LET c=24

121 IF c<l THEN LET c=I

122 PRINT AT 0,c; p

130 LET k=k+i; IF k=30Q OR fc=3Ql THEN PRINT AT 0,1:1 *

132 IF k>325 THEN 60 TO 300
200 60 TO 100

300 BEEP L/2 t 10: BEEP 1/20,30: CLS ! LET tl=FN tü! IF tl<=tr THEN LET tr=tl: P
RIHT 1 HUEVO RECORD*

305 PRINT B Tinpoi , itl ,, R«ttrt: , Ur
310 PRINT AT 21,Oí*OTRA PARTIDA? CS/Hl
320 IF INKEY4= t 5* THEN 60 TO 10
322 IF INKEYS=V THEN RANDONÍZE USR 0
330 60 TO 320

9999 SAVE 'RACINE'CQBE 16384,^EEX 23fi£?+256*FEEK 23628*16382: 00 TO 1

11

i_n

2100 PftIHT : PRINT ’£L LEON, REY DE LA SELVA... — TE HA ENCONTRADO'’'‘KO PUEDES
HUIR DE EL... 1 : SO TO 900

2200 PRINT : PRINT 'NO DEBISTE ENTRAR AL NAR...•'■'PUESTO 8UE ESTA INFECTADO DE.
TIBURONES..,■: 60 10 900

2300 PRINT I PRIKT 'ESTAS EN EL LUSAR DE PARTIDA,""AtíII VINISTE A PARAR OVANDO

.,.”''NAUFRAGO TU BARCO.""ENCUENTRA LOS TRES COFRES T LAS" "LLAVES PARA ABRI

RLD3"'"V DIRIGETE A UNA ZONA HABITADA’: RÉTVRN

2500 FR1NT I PÑlNT ‘TE ENCUENTRAS EN LA PLATA...': RETURN

2700 PRINT ; PRINT *TE ENCUENTRAS FRENTE AL RIO. ..""CRUZAS?': 60 SUS 9000

2710 If R$='S' THEH PRINT "ND SABES NADAR!!!! ” "TE HAS AH06A0O.': BEEP 1,-iO:

PAUSE 43: 60 TO 900

2714 IF RRi'N' THEN PRINT "HAS HECHO LO ÑAS PRUDENTE...""BUSCA UN PUENTE POR
DONDE CRUZAR'

2720 RETURN

2800 RRINT 1 PRINT 'TE ADENTRAS EN LA SELVA..'ANDA CON CUIDADO, NO TE VAYAS'
"'A PERDER...'

2801 RETURN

2900 PRINT : PRINT 'HAS ENCONTRADO LAS LLAVES ÍUE""ABREN LOS COPRES...*: 60 SU
B 4000: LET 0*=0*fV: LET A(IX,Í>='P’; RETURN

3000 PRINT : PRINT 'HAS ENCONTRADO EL PRINER COFRE..': SO SUB 4000: LET 0*=WU
': LET AÍIX.na'P': RETURN

3100 PRINT : PRINT 'HAS ENCONTRADO EL SEGUNDO COFRE': 60 SUB 4000: LET 0í=0(*'V‘

: LET AdX.YIs'E*: RETURN

3200 PRINT : PRINT 'HAS ENCONTRADO EL TERCER COFRE..': 00 SUB 4000: LET 0(=0(*'V
*: LET A$(X,YI S 'E‘: RETURN

3550 f PINT : PRINT 'FDR FIN HAS LLE6AD0 A UN LUGAR" "HABITADO..: 60 5UE 4000
3510 LE' L=LEN OS: l c L04 THEN PRINT '"PERO CONO NO RECOSISTE EL DINERO" "NO
fUEOEE VOLVER A CASA.': SO TO 900

3520 PRINT "CON EL DINERO 8'JE HAY EN LOS" "COFRES PODRAS PASAR TU REGRESO" "A
CASA....’

3530 FDR 2=-30 TO 40 STEF J: BEEP 1/100,Z: NEXi Z
3400 PRINT AT 21,0¡'OTRA AVENTURA’ IS/N1’

3610 IF INKcYÍ='S' THEN RUN

3411 IF !NKEY(=‘N' ’HEN RANDONIZE USR O

3620 SO >0 3610

4000 DATA 1,2,2,4,3,6,7,5,6,8,9,7,5,4,3,¡: RESTORE 4000: FOR Z=1 TO 14: READ 21:
BEEP 1/4,21! NEXI Z: RETURN

9000 LET R$=INKEí$: IF R(='N' QR RI-'S' THEN RETURN
9010 60 TO 9000

9999 SAVE 'LA ISLA'CODE 16184,PEEK 23627+256EPEEK 23628-16182: 60 TO 1

TU BARCO HA NAUFRA¬
GADO Y ESTAS EN UNA
ISLA DEL CARIBE.
DEBERAS SALIR DE
ALLI LLEGANDO A UN
LUGAR HABITADO, CON
TRES COFRES PARA PA¬
GAR * TU REGRESO.
DISPONES DE UN HOPA
CODIFICADO, QUE YA
ENTENDERAS ???

EUITA TODOS LOS PE¬
LIGROS ! ! ! .

PAUSE 200

106 IF INKEY( s 'S' THEN OLS

107 IF 1NKEY*='E' THEN CLS

108 IF INKcYÍ='0* THEN CLS

109 IF INKEYÍ=‘N' THE* CLS

1 IF IHKEY1='S’ THEN 60 TO 9999

2 PRINT AU' PAR* LA CINTA

10 DIN 1(110,101

20 LET a«¡l = 'NNKNNKNHNN l
2! LEI ail2l='HPNPPUPPTN’

22 LET «Ill-NPCCCDSEPN-

21 LET i(I41.'NPSSCCCSPN'

24 LET aítSl^'HRRRFRRRRN'

25 LET a(16l='NABBCSESHN'

26 LET a(I71 s, NABASLETPN'

2? LET á(i81 =, NACA6HVSPN’

2$ LET a(l9l='NICCCCSVSH*

29 LET a(ll01=*NHELAEIL2N*

30 LET X=2: LET Y=3! LET 0(=”

40 60 SUB 4000: CLS : INPUT “

:oe FOR Z-l TO 5: BEEP 1/50,10: PAUSE 6: NEXT Z: BEEP 1/50,30: 60 SUB 100 B 1 C 0 DE
AHX,n-55): PRINT AT 21,0!'NAPA (NI - DIRECCION IN,S,E,OI'

105 If INKET(='N' THEN CLS : PRINT 'TE íIRISES AL NORTE': LET X*X*1¡ 60 TO 100
PRINT 'TE DIRIGES AL SUR': LET X=X-U 60 TO 100
PRINT *TE DIRIGES AL ESTE': LET Y=Y-1! 60 TO 100
PRINT ‘TE DIRIGES AL OESTE': LET Y=M; 60 TO 100
FOR Z=! TU 10: PRINT AT Z,l¡A((2l: NEXT Z: PRINT O
VER l; AT X,T¡' •: PRINI AT 10,?;'Z*!AT 3,15!' SUR* i AT 4, líi**"AT IN, 1 i'OBJETOS:
U.V.y.T-: PAUSE o
200 60 TO 105

900 PRINT : PRINT 'HAS NUERTO*'*'PULSA UNA TECLA PARA EMPEZAR-': BEEP 2,-10:

PAUSE OI 60 TO 10

1000 PRINT : PRINT 'HAS CAIDO EN ARENAS NOVEDIZAS""N0 PUEDES SALIR.': 60. TO 90
O

:IQ0 PRINT : PRINT 'TE ENCUENTRAS EN ZONA PANTANOSA**"TEH NUCHO CUIDADO CON...'
"LAS ARENAS NOVEOIZAS.'I RETURN

1200 PRINT : PRINT 'ESTAS EN EL CANINO DE TIERRA...': IF RNDÍ.5 THEN PRINT "SIS
UE ESTE CANINO...'

1201 RETURN

1300 PRINT : PRINT 'HAS PENETRADO EN...""UNA OSCURA CUEVA.': IF RNDÍ.5 THEN PR
INT : PRINT 'EN LA CUEVA HAY UN OSO, ESTE*”'TE ATACA Y NO PUEDES DEFENDERTE. 1 :
60 TO 900
1310 RETURN

1400 PRINT : PRINT 'TE ADENTRASTE DEMASIADO EN LA" 1 'ESPESURA DE LA SELVA...""
TE HAS PERDIDO, NO SABES CONO""SALIR...*: SO TO 900

1500 PRINT : PRINT 'VEO UN PUENTE IUE CRU2A EL RIO" "ESTA EN NUY NAL ESTADO. CR

uzo’ - ; 6 ü sub 9000; if r(='S' then let x=Xti: FOR z=i ío 20: beep 1/100,rndíio:

NEXT Z: PAUSE 2: 60 TO 1510

1505 LET X=X-l: IF R(=’N' THEN PRINT : PRINT 'ENTONCES NO SE BUE PIENSAS HACER.*:
RETURN

1510 PRINT ! PRINT "EL PUENTE SE NA BERRUNBAOÜ.*: IF RNDÍ.7 TNEN PRINT "TE

HAS CAIDO AL RIO...’: SO TO 900

1520 PRINT "PERO POR SUERTE HAS LOGRADO*’ "CRUZAR!!!': RETURN
1400 PRINT : PRINT 'FEROCES CANIBALES SURGIDOS-* "DE LA SELVA TE ATACAN" "SERAS
SU GUISO...*: GO TO 900

1700 PRINT : PRINT 'HAS CAIDO EN UNA TRANPA PARA '"'LEONES.""TUS HERIDAS SON
NUY GRAVES': 60 T0 900

1300 PRINT : PRINT 'HAS CAIDO AL NAR POR ÉSTE" ’'ACANTILADO.': SO TO 900

12

1

2336i 203, .193,96,203,i62+9£+33.233, -1243

23369 127*34,176» 0 2.3 3, 100,0*34, =596

‘2357? 20+96,33*129,92,110,30,0+ -310

25383 34,0,96.33,33,92,233.42, -587

33393 0,9*,123,13,33,0*0,1£3, -397

23601 230,7,211.234,33,0,0,125, -960

23609 133,135, 135,33,141,92, 71,126, -86©

23617 230,199,205,152,99,33,7,0. -923

23623 60,33,141,92,205,128,9^,33, -800

23633 1,0,123,254,1,40,6,233, -600

23641 203,83,132.24,4,233,203,83, -1035

23649 24*,203,172* 96,33,10,0,235, -997

23637 33,5,O,233,205,239,9B,205. -1020

23663 211,97,80,83,76,0.3,65,32, -729

23673 60,03*62.32,80,63,82,65, *529

23681 32,69,77,00,69,90,63,82, -364

2560* 233.203,7,99,203,119,99,111, »110Q

23697 38,0,233,33,83,0,167,237, -793

23703 82,194,112,1OO, 195, 113, 100, 193, -1093

23713 93,100,33.0,0,34,16*96, -300

23721 33,0,0,34,30,96,33,Ó, -226

23729 0*34,10,96,42,18,96,213, -Sl7

2573? 233,33.1,0,23,209,34.10. -335

23745 96,33,8,207,233,42,18.96, -735

25753 213,233,33,101,0,23.209,125, -941

25761 10 T 42,1&,96,213,233,33,101, -756

257*9 0,23,209,235,33,117,0,167, -786

25777 237*82,210,197,100,33,1,0, -860

25703 34*13,96,33,8,207,235,33, -6*4

23793 102,0,123,18,33,7,0,69, -334

25801 33^141,92*203,128,99,205*172, *1073

23009 96*33,0,0,233,33,0,0, -397

23017 233,203,239,98.203*211,97*02, -1372

23023 69*67*79.82,68,32,68*69* -534

25033 32,72,79,89,38,32,255,42, -63®

25841 20*96,203,223,97,203,211,97, *1134

2=849 32*32,32,233,33,0,0,233, *619

25857 33 * 26*0,233,203,239,98,205, -1041

23063 211,97,63* 46,71 * 46,68,46* -650

23373 233,205,7,99,33*3,0,69, -671

23001 33*141*92,205,120,99,33,1* -732

23009 0,233,33,0,0,233*203,239, *947

25S97 90+205,211,97*64,96,96,96, -963

23905 90,96*96,90,96,96,96,90, -7ÓS

23913 96+96+96,96,96,96,96,96, -760

2592í 96 * 96 + 96 * 96 * 96,96,96,96, -760

23929 96+96,96*63,253,203,7,99, -917

23937 33+21,0*233*33*0*0,233, -557

23943 203+239,90*203*211,97,64,96, -1213

25933 96,96,96,96+96,96,96,96, -760

23961 96,96+96*96+96*96*96,96, -76B

23969 96*96+96*96,96,96,96,96, -768

23977 90,96,96,96,90+63+253,203, -1003

23983 7,®9,33+7*0+69+33+ 141 * -369

23993 97,203,128,99*33.22*0+233, -814

26001 33,0+0+235.205,239,90*200, -1015

26009 211,97+80,85,78,84*79+83, -797

26017 58,32+ 32 + 32+ 32+32+32 + 32 , -282

26023 70,63,83,69,38+32,32+32* -441

26033 32,32,86+73,68,65,83*30, -49?

26041 255,203,7,99,33+0,0,34, -633

26049 6,96.33+16,0,34,36+96, -317

26057 33,0,0+34,24+96,33+0+ -220

26065 0,34,34,96,33.22*0*235* -454

26073 33*7,0+233,203.239+98.42, -839

26081 30,96,203,223+97,33*22,0, -706

26009 233.33,19,0,233,203,239+90+ -1064

2609? 42,18,96,203,223,97,33+ 22 + -736

26105 0,233,33,30+0,233,203.239, -977

26113 9@+42.16+96+203,223,9?,203, -902

26121 7,99+62.0,33,96*234,229. -760

26129 193,33,216+234+233,33+6,0, -930

26137

26145

26133

26161

26169

2617?

26183

26193

26201

26209

26217

26223

26233

26241

26249

26237

26265

26273

26261

26209

26297

26305

26313

26321

26329

26337

26345

26333

26361

26369

26377

26305

26393

26401

26409

26417

26425

26433

26441

26449

26457

26463

26473

26401

26489

2649?

26505

26513

26521

2652®

26337

26543

26533
26561
26377
26585
26393
26601
26609
26617
26623
26633
26641
26649
26637
26663
26673
26681
26689
26697
26703
26713
26721
26729
26737
26743
26753
36761
26769
26777
26705
26793
26001
26809
26817
26025
26S33
26841
26849
26837
26863
26873
26001
26809
26997
26905
26913
26921

203+ 138+98* 205.200,96+124,230,
127*103,213+235,33 + 204 +12,203,
102* 97* 209,34,46,96,42,46,
96,213,233,33+3*0,23*209+

34,46,96,205*200*96* 124+ Z30,

127+103+213+235*33*105,4,203.
102,97,209,34*48,96+42,48.
96,213,235,33*1,0,25,209+
34,48,96,42,0,96,233+33+

1,0,123,18,42,0+96.213,

235,33,1,0,25,209+235.42,
46,96,123,10+42,0,96,213+

235,33,2,0,25,209,233,42,
48,96,123,18,42,0,96,213+

233,33,3,0,23,209,233,33,

0+0,125,18,42,0,96,213,

233+33,4,0,25,209,233,42,

46,96,123,18,42,0,96,213,
233*33+5+0+23,209.233,42,

48,96,123+10,62,0,205 +191 ,
99*33+7+0+09,33+141,92*

205+129*99+203,119,99+111,38,

Oí 235* 33* 73*0, 167*237*02,

194,27,103,42+36*96+233*33,

1+0*167,237,82,210+27+103,
33,20,O,235*42+36,96+233,
203+239,98,203,211+97,32*32,
32,253*205+7,99+42*36*96*
213*235*33+i+0*235*167*237,
02,209+34+36*96,33,20*0*

233 + 42,36 + 96 +233 * 203 * 239 * 98,
203+211+97+97,90*99.253,203,

7,99+205,119*99,111*30+0*
235+33,90,0,167*237*82,194,

111, 103+ 42+36,96,233+ 33,28.

O,167,237+82.218,111*103+33.

20 + O * 235 + 42 + 36 * 96,235,205 *

239 * 96,203,211,9?,32,32*32,
233+203,7,99,42,36+96*213,
235+33,1+0+25,209+34,36*
96,33,20+0,233+42+30+90,
233,203,239,90+203+211+97.97,

98,99,233,203,7,99,203+119+
99,111,30+0,233+33+01,0,
167,237,82,194+163,103,42+6+

96,235,33.0,0.167,237.82.
194,165,103+ 33,1,0,34,6,
96*33.19+0,34+42+96,42+
36*96+213,235+33+1,0*25,
209*34+44,96,33+20+0+235+
42,36,96,235,203,239.98,203,
211,97,97,98,99,235,205, ?,
99.42.24,96.235+ 33,20,0,

16?,237,82.210,22.104+62+0*
235,33+1+0,205*150+90*33*
£34,0,229,193+205,200+96,124,
230,127,103,125,237,121*62,0,
203, 191,98,62+0+ 33+ 96*234,

229,193,33,216.234,233 + 33,6*

O,205,138,98.42,0,9*,235+
33,1+0+125*18,62,0,203,

191 + 98,33,0,O,123,230, 7 ,

211 * 254 * 195,133,100+203,119+99,
1 1 1 + 30 + 0,235,33 + 34.0+167,
237+02+194,39,104*201,203,43,
104+195+106+102+33+2+0,34,
40+96+62+0+33,96* 234 + 229,
193+33,216,234 + 233,33*6,0,

205 +150 +98+42*34+96* 235 * 33,

2,0,167+237+ 02*194+43+105,
42,6,96,235,33*1,0+167+

237,82,194,43 +105 + 42 + 42 + ®6 *

235,42.44,96,235 + 205,239,98,
205,211,97,32,233,203,7,99+
42,42,96,213,233+33,1,0,

233,167,237,82,209,34.42,96*
42,42,96,£35+ 42,44,96+ 235,
205,239,98,203+ 211,97+101 + 233,
203,7+99,62,19,33.1,0+

229,193,33+3,0,233,33,1,

O,205,138,90,33,234,O,229,

193 * 203,200,96,124,230,127,103,
213 * 233,33*8,0,203,156,97*

O,209+123,23?,121,62,19,205,
191,98 + 42,42,96,233,33,2,

O +167,237,82,218,43,103,42 +
42,96+ 233.42,44,96,233,205 +
£39+90+205+211,97,120.233.205,
7+99+62,19+33,1,0* 229,
193+33+so+O,233,33,1,0,

205+130+93+33,254.0,229.193+
205+200,96*124,230,127,103*213,
235+33,8*0*205,136,97,0,

209+125+237,121.62,19,203*191,
98 + 42 + 42 + 96,235,42,44,96,
235+205,239,98,203,211,97, 32*
235 * 205 + 7*99,33,0*0.34,

6 * 96 *42,34 + 96,213,235,33,

-1316

-1132

-752

-©14

*1031

-1025

-736

-012

-504

-493

-780

-636

-701

-630

*773

-494

-703

-636

-784

-745

*473

- 1004
-827
-766
-827
-697
-1119
-772
*1121
-310
-1186
-12*7
-678
-1028
-684
-931
-069
-946
-933
-373
-538
-1387
-1007
-397
-996

-eso

-336

-362

-639

=671

-1156

-1069

-549

-004

-763 ,

-1301

-1003

-919

-1 1 79

-934

-444

-6B4

- i 316
-630
-1107
-636
-790
-950
■901
■830
-580
-841
-1 194
*1111
-662

- 1102
-832
-1411
-426
-729
-977
-1278

—947

-978

-739

-894

-995

-1430

-450

-543

-1170

-1298

-734

-1169

-693

-1322

-633

-733

13

2a*2* l*ú*25*209,34,34,9*,42,

2**37 34 *96*235.33,3,0,1*7,237,

2**43 02,210,73,¿03,33,0,0.34,

2 s *33 34,96,42,18,96,233,33,7,

2**al 0,i67„237» 82 f 2 18 , 110,103,62,
2 *s a * 19,33, 1 »0,229,193,33,10,

26977 0,233,33,1,0,203,130,90,

2* s t 5 62,19,205,i 91,90,42,0,96,

2***3 213,233,33 *3,0,23,209.34,

27001 50,9*,42 * 30.9*, 110,30,O,

2700* 34,30,96,42,0,96,110,30,

"-17 0,233,33,0,0,167,237,02,

2^:23 194 p 151,103,193,135,100,42,0,

27033 *6,213,233,33,1,0,23,209,

27041 34,2,96,42,2,96,110,30,

27049 0,34,2,96,42,0,96,213,

27057 233,33,2,0,23,209,34,0,

'T063 96,42,0,96,110,30,0,34,

27073 3,96,42,2,96,34,10,*6,

27081 42,0,96,34,12,96,203,200,

2 7009 96*124*230,127,103,34,14,96,

27097 42*14,96,233,33,40,117,167,

27105 237*02,213*6*106,42,10,96,

27113 213,233,33,1*0,23.209*34,

27121 10,96,42,10,96,235,33,20,

27:29 0,167,237,32,210,6*106*33,

27137 2,0,34,10,96*42,14*96,

27143 233,33,40,117,167*237*32*210,

27133 34,106,42,10,96,213,235*33*

27161 1,0,235,167,237,62,209,34.

2716* 10,96,42,10,96,235,33,2,

27177 0,167,237,02,210,54,106,33,

27185 2,0,34,10.90.42,14,96,

27193 235,33,0,64,167,237,02,210,

27201 116 *106,205*200,96,124,230,127*

27209 103,233,33,160,97,167,237,02,

27217 210*116*106*42,12**6,213,235,

27223 33*1*0*25*209,34,12,96,

27233 42*12,96* 235,33 * 30 * O * 167 *

2724 1 237,92 *210,116, 106» 33 * 1*0*

27249 34,12*96*42,14*96,235,33,

27257 O» 64,167*237,92*210*101,106»
27265 205,200,96,124,230,127,103,235»

27273 33,160,97,167,237,02,210,181,

27201 106,42,12,96,213,235,33,1,

272B9 O,233,167,237,62.209,34,12*
27297 96,42,12,96,233,33,1,0,

27305 167,237,02,210,181,106,33,30*

27313 0,34*12,96,42,10,96,213,

27321 235,33,10,0,205,156,97,0,

27329 209,34*30,96,33,138,127,213,

27337 233,42,30,96,235,167,237,82,

27343 209,34,30,96,42*14* 96 * 235,

27353 42*30,96,167,237*02,210*31,

27361 107,42,50,96*235*33,0,0*

27369 167 * 237 * 02,194,31*107*42*0*

27377 96*213,233,33,3*0,23,209,

27383 235,33,1*0,125*18,42,0,

27393 96,213,233,33,4*0,23,209,

27401 235,42,10,96,125,18,42,0*

27409 96,213,233,33,5,0.25,209,

27417 233,42,12.96,123,18,42,0,

27423 96,213,235,33,1,0,23,209,

27433 233*42,10,96,123,10,42,0,

27441 96,213,233,33,2,O,25,209,

27449 233,42*12,96*125,18*42*40*

27437 96,69*33,141*92,205,128,99,

274*3 42,40,96,213,233,33,1,0,

27473 25,209.34,40,96,33,0,207*

27481 110,38,0,34,4,96,42,2,

27489 96,235,42,8,96* 235,205* 239,

27497 90,203,211,97*32,253*42,10*

27303 96,235,42,12,70*235,203,239*

27313 90*42,4,96,125*205,114,96*

27321 203*7*99*42,40*90,235*33,

27329 7,0*167,237,82*210,151,107*

27537 33,2,0,34,40,96,33,7*

27345 0*69,33,141*92* 205 *120,99*

27553 42,6,96,233,33,1,0*167*

27561 237,62,194,135,108,42,44,96*

27569 233,42,12,96,167,237*82*194»

27377 135, i08,42,42* 96,235,42,10,

27383 96,213,235,33*4,0,233,167,

27393 237,02,209,167,237,82,210,133*

27601 100,42,42,96,233,42.10,96,

27609 213,233.33,4,0*23,209,167,

27617 237,82,218,133,100,42,42,96*

27 6 2"3—235 *-42794 1 ¥¿r; 2357 205 * 239,90*-

.27633 205* 211*97,32* 235,205*7*99,

2^ís4 1 42,10,96,235,42,12,96,233,

27*49 205»239,98 *2Q3,211,97,120,233,

27637 205*7*99*62*19,33,!*Q t

27665 229 *193,33,00,0*233,33,1.

27673 0,205,138,90,23,234,0,229,

27*81 1 - 93 , 33 ,0.0,213, 233 ,42, 38,

2^*09 9 0 í r05*156,97,0*209*123*237,
27697 121,62,19,205*191,90,42,10*

27?03 96,235,42, 12.96,233,203,2 39,

-441

27713

-010

27721

-339

27729

-561

27737

-981

27745

-310

27753

-730

27761

-713

27769

-752 .

27777

-482

27785

-466

27793

-734

27601

-930

27009

-812

27817

-420

27823

-403

27833

■346

2784 1

■ 424

27849

-384

27857

-693

27065

-324

27873

-752

27001

-797

27889

-750

27097

-342

27903

-841

27913

-294

27921

-1129

27929

-789

27937

-965

27943

■324

27953

*097

27961

-294

27969

-1036

27977

-1204

27985

-1122

27993

-1030

20001

-410

28009

-613

28017

-783

28025

-5*2

28033

■ 1047

28041

-1320

2804 9

-1173

23037

-738

20065

■ 976

2S073

-315

28001

-1034

2B089

-511

20097

-736

20105

•eee

28113

-1132

28121

-764

20129

*903

28137

*563

28145

-860

28133

-814

28161

-434

28169

-015

28177

-368

28183

-016

20 193

-370

28201

-812

28209

-560

28217

-813

20223

-610

2B233

■863

28241

-660

2S249

-652

20237

-326

28263

-1136

28273

-930

2S201

.1160

28289

-700

20297

-757

28305

-961

28313

-243

28321

■ 767

28329

-300

28337

-930

28345

-1063

20353

-710

28361

-983

20369

-1339

28377

-671

28385

*886

28393

-960

20401

—*11Vü

20409

-lili

28417

-76S

28425

-1430

20433

-426

38441

-004

2844 9

*977

20437

-762

20465

-1123

28473

*740

28481

-1160

204B9

90,205.211,97,32,235,205*7»
99,42,0,96,233,33,0,0,
125,18,42,24,96.213,233,33,
1,0,23,209,34,24,96,42,

30,96*213,233,33,5*0.25,

209 * 34,30,96,33,22,0,233,
33,7*0*233,205,239*90,42,

30 * 96 * 205 * 223*97*205,7*99.

33,0,0,34*6,96*42,0*

96,213*235*33*3*0,25*209,

34* 50,96,42* 50* 96* 110*38,
0,34,30,96,42,50,96* 235,
33,0,0,167,237,82,194,173*
108,193,21,110,42,0,96,213*

233,33,4,0,23,209,34,2,
96*42,2*96,110,38*0.34,

2,90*42,0,96,213,235,33,

5,0*25,209,34,0.96,42,

@,96*110,30.0,34,0,96,

42,2,96,233,42,0,90*233,

203 * 239,98,203,211*97,32,233,
205*7*99,42,2,96*213,235,
33*1,0*25.209*34*2,96,
42*0*96.213,233,33*4,0,

25,209,235,42,2,96,125,18,
42*2,96,233*33*20*0*167*
237,82,210*132*109*33*20*0,
34*2,96,33,20,0,233,42,
8*96,235*203*239,98,205,211,

97*120,233,203,7,99,62,19*

33,1,0,229,193*33,40*0*

235,33,1*0,205,158,98*33*
254,0,229,193,33,8,0*213*
235,205,200,96,124,230.127*103*
205,156*97,0,209,125,237,121,
62,19,205,191,98,33,20,0,

235,42,8,96,235,203,239,98,
203*211,97,32,255,205,7,99»
42.0,96,213*235.33*3,0,

25» 209,235,33»0*0»125, 18,

193,21,110»42»2,96,235»42,

0,96*235,205,239*90*205,211.

97»100.255 *205*7,99,33*254,
0*229*193,33,9,0,213,235,
203*200,96»124*230,127,103,205,
136,97*0*209*123,237*121,42,
2,96*233,33,20*0,167*237*
82,194,212,109,42,8,96*235*
42,36,96,213*233,33,i*O*

25,209,167,237,82,194,212,109*
193,27,110,42,2,96,233.33*

20,0,167,237,82,194,241*109,
42,8,96,235,42,36,96*167,
237,02,194,241,109,195,27,110,
42.2*96,233,33,20*0,167,

237,SZ,194,21,II0,42,8,96,
233*42,36,96.213*235,33,2,
0,23*209, 167,237* 82. 194,21,
110,193,27,110,62,0,205,191,
90,201,62,19,33*1*0.229,
193,33,244,1,235»33.1,0,

205,138,99,205,200*96,124,230,
127* 103,213,233,33* ¿53*25,203,
¿82*97*209*34*2,96*33,2,
0,213,233,42*2,96,23*209*

69,33,141*92.205,120*99.33*
20,0,235*42,36,96,235 * 205 *
239.98,205.211,97,117,118,119*
255,203,7,99,33,254,0,229,

193,33,8,0,213,235,42,38,

96,203,156,97,0,209,125,237,
121*62,19,205»191*98,33,20,

0,235 * 4 2,36,96 * 233 * 203,239,

98,205,Z11 * 97,97* 90* 99,255,

203»7 * 99,62,0,33»96,234 *

229*193,33,216*234*233,33,6,
0,203,130,98,42,0.96,213*

235 *33.3,0,25 1 209.235,33,
0*0,123»18.62,0*205,191,
98,33,7*0*69,33*141*92,

205,128,99,42,16,96,213,235,

33. 1,0,235,167,237»02,209,

34,16.96,42*16,96,233*33*

0,0,167,237,82*218,228,110,

193,237,110,33,0,0.34,24.

96,193,197*100*33*1*0,123,
254,1,40*6*253,203,83*190»
24,4,233,203,83,254,33,10,

0,233 *33,11,0.233,205,239,

90 * 205 ¡,211*97*71* 63* 77*69*
32,32,79,06,69,82,255,205*
7,99,33,0,0,123,234,1,

40,6,253,203,83*190*24*4*
233,203*83,254,62,0,33,1,

O,229,193,33.184,11,235,33,
1,0* 205, 158,98 * 33 *254,0»

229*193,33,0*0,213,233*42*

O,96,205*136,97,0,209,123,

* 1 110
-303
-706
-431
-637
“659
-839
-962
-211
-814
-316
*603
-886
-785
-542
-410
-717
-419
-390
-756
■1342
-899
-400
-623
-732
*593
■823
-462
■1297
*064
-529
-763
-930
-1320
-1150
•628
-1138
■lili
-622
■645
■743
*1297
■1050
- 911
-1290
*987
-790
*978
-656
-1233
-740
-1030
-722
-1195
*393
■790
-892
-935
■900
-643
-740
-1316
- 1094
-633
-822
-000

-869
-1204
-1032
-762
*1125
-749
-1080
* 1 160
- 7 J 6
-1179
-812
-773
■601
-473
-1034
-964
*368
-1042
*633
■747
■1030
-864
-938
-093
■ 040
-319
■803
-089
-910

-749

■953

-0BB

14

2049?

237,121,62,0,203+191 + *8 1 42,

“95*

288 17

0, 12*,*,12*+ *4 T 126,0,0,

-448

29137

0+126+6,24*96,126,0,0,

-378

28505

30,96,233,42+20 +9*,1*7,237 *

“923

28825

0,124,4,12*,*,126+0*0,

“306

29143

14,8+0,0+0+14+0+0,

-*o

38513

82,210.137,111,42,30,«6,34,

“742

28633

0,96,102,126,6,6,0,0*

-336

29133

0,64,32,16,8,4.0+0+

• i 24

2B32I

20,9*,33,12*0,233,33,10,

“439

28841

O.126*64+ 126,6,126 + 0,0*

-448

291*1

112,16,16,16+16,112*0*0+

-20S

2B329

O,235,205,239,90,203,211*97,

* 1290

28849

0*124,64,126,70,126,0,0,

-310

29169

16,36,84,1*,ió+16,0,0+

= 204

28537

78,83,69,8*,79,32,82,*9,

-580

28057

0,126,6,12,24,24,0,0,

-192

29177

239,247,24,12+ 247,2?1 + 0 + 0 +

“1020

2B543

*7,79,82,68,233,203,7,99,

■862

28865

0,60,36,126,102,126,0,0,

-430

29 J 85

0+253*102,102,233,0,0+0+

-714

26553

33,144,1,1,96,3,11,120,

-409

28873

O*126,66,126,A,6,0,0,

-330

29193

1+1*31,37+93,93.127,193,

-382

283 ó:

177,32,231,43,124,101,32,243,

— 1083

28881

0,24,24 * O ,24.24,0,0,

•9*

29201

1*6,101,235 + 233.233.235,255 + 0 +

-1342

28369

203*172,9*,195,235,99,207,22 +

“1231

28089

0,24,24,0,24,24 p 48,0,

-144

rtM ,-54* +"*** ‘S'St»,-55A, Aü.

2037?

0*0,0,0*0,0,0,0,

-0

20897

0,12*24,48,24,12*0,0,

-120

29217

20,40+60, ?4 * 24,24+24,0,

-216

2 65 05

0 T 0,0,0,0,0,0,0,

-0

28*05

0,0,62,0,62*0,0,0,

-124

2922?

193,i9 3,195,0, 193,195+ 193,30 +

= 1200

26393

0,0,0 * 0 * 0, o, o, 0,

-O

28913

0,40,24.12,24,48*0,0,

-15*

29233

127,233,253 +127,233 +126,3* *60 +

*1241

28*01

0,0,0,0,0,0,0,0p

-0

20921

0,232,102,10?,232,0,0,0,

•708

2924 1

44,44 + 44,235,94.44+24,235,

-804

20*09

0,0,0,0,0,0,0*0*

“0

28929

0.63,102,102,63,0,0,0.

•330

29249

133,109,233,193.231+133,66+60,

-1302

28*17

0,0,0,0*0,0,0,0,

“0

28937

O,126,70,126*70*70,0,0,

-4*2

29237

126,719,235,i 63, 129,¿6,*o,12* +

•1146

28*23

0,0,0*0,0,0,0,0*

-0

26945

0,124,93,124,99,124,0,0,

-3*8

29263

219.255,12*,36,*6,36,6*,235,

= 1039

28*33

0,0,0,0,0,0,0,0*

“0

28953

0,126,70,64,70,12**0,0,

-43*

29273

133,133+189+255,163.129,235,24+

• 1323

28*4 1

0 p 0 p 0,0,0,0+0,0 +

-0

289*1

0.126,70,70,70,126,0,0,

•462

29281

60*90.233 * 231,66 + 36,24,24 +

-78*

28*49

0,0,0, o, 0,0, o, o,

-0

289*9

0,126*96,12*,9*,12*,0,0,

“370

?9?09

44*94,191+191,I9i*233,60*231 ,

= 173^

28*37

0,0,0,0,0,0,0*0*

“0

28977

0,126,96+126+96+96,0,0*

•540

29297

24 +233,133 +189,231* 24,231 + 24,

-1131

28**5

0,0,0,0,0,010,0,

-0

28985

0,126,64,78,70,126+0*0,

-464

29305

60,90+ 126, 126, 1*5+ *0 + 90,253 +

-972

28*73

0 p 0 p 0 ,0,0,0 1 0+0,

-0

28993

0,98,98,126,98,98,0,0,

“51Q

29313

133+109,231,193,255+231.*6,8.

•1328

26*81

-16,16, 1 *, 16,0,16,0,0,

“00

29001

0.24,24,24,24+24,0*0+

-120

29321

16+?,i*, 12L9,235,126, 129,

■895

28*89

36,36,0,0,0,0,0,0,

-72

29009

0,12,12,12,12+60,0+0*

-IOS

'ÍO^.2'5

*C.76,255.153,,131+126,60,

-1 1 16

28*97

O, 0 , o, o, o, o, o, o ,

-0

2901 7

0,100+100+126*70+70*0,0+

-46*

'2*,727+171,¡61,253,12*,*0,231+

-1403

28703

0,0 1 0,0 t 0,0,0,0,

-0

29023

0,96,96+96+96+120+0+0+

•310

“9343

7*.12**90*253+129+129,255,120,

-1148

28713

0,0,0,0, O, 0,0,0,

-0

29033

0.126,86,06+ 06+06,0+0,

-470

2935"

*3+51,39+31,15+31.233,16,

-523

28721

0.0,0,0,0,0,0,0+

-0

2904 1

0,126,70,70,70+70,0+0+

-406

2 a 361

16+24,109, Z 55,255*233,255,1+

-1230

2B729

8,16,0,0,0,0,0,0*

•24

29049

0, 126,90,98,98, 126,0 + 0 +

-546

7 9 3 o 7

130+204,220+ 2-18,2-10, 240,253+ 145,

“1690

28737

6,12,24,24,12,6,0,0,

•84

29057

0, 126,98,12* , 96,9*,0 * 0 +

“342

7 = 377

82+36,3+192+36,74,137+30,

-390

28745

96.48,24,24,40,96,0,0,

*336

290*5

0,124,100,100,100,126+0+0,

•330

29303

127+753.235+12?,235*12*,36.30+

* 121 i

28733

0,20,8,*2,8,20,0,0.

•118

29073

0, 126,98 ,124.70,70,0*0*

*480

29393

127* 253,234,235,235 * 12*,*0,0.

= 1332

297*1

0,8,8,62,8,0,0,0,

•94

29081

0,126,96,126,6,126,0,0*

-480

29401

0,0,0,0,0,0,0,0,

-O

287*9

0,0,0,0,8,8,16,0,

-32

29089

0,126,24+24,24,24,0,0,

-222

2?409

0.0,0+0,0,0,0,0.

•0

29777

0,0, 0, *2, Op 0, 0,0,

-62

29097

0,98,98,98,98,126,0,0,

• 318

2941 ?

0,0,0 + 0 + 0 * 0 + 01 0 +

*0

28783

0,0,0,0,24,24,0*0,

•48

29105

0+98,98,98,52,24,0+0+

■ 370

29423

0+0,0,0.0+0,0+60»

= 60

28793

0,2,4,8,16,32,0,0,

-*2

29113

0.106,106,10*,106,126,0+0,

-350

29433

*6,133+1*1,161,153,06,60+0,

-020

28801

0,126.66,70,70,126,0,0,

-458

29121

0+98,98,60,70,70+0,0,

- 59*

2B809

0,24,8,8,28,20,0,0,

•96

29129

0 +90,98,12* + 24 + 24,0+0,

-370

1 IF INKEY*“ "g" OR INKEVí=" G" TH-EN SAVE " MASACRE "CODE 16384,13100: GO T Q 1

2 FRINT AT 10,10?"PARA LA CINTA": PAUSE 200

3 L£T L-USR 23SÓ1

Deseo suscribirme a los 11 n. os de la revista por sólo 1950 pts.

El importe lo haré efectivo:

□ Por giro posta! n+* —........,*+*

O Por talón nominativo adjunto*

□ Contra reembolso a la recepción del primer ejemplar, más gastos de envío*

Deseo suscribirme a partir del n.°

{inclusive}.

Nombre y apellidos:

Domicilio: ...

Ciudad: ...........

Fecha ..*.

.. Teléfono
Firma .

1985- Soft Spectrum

En este numero vamos a empezar
una serie de ideas de como utilizar la
función POKE, como todos sabemos la
función PGKE se utiliza para introducir
un valor directamente en la memoria
RAM de nuestro ordenador*

En el Spectrum existe una zona de
memoria que el ordenador necesita para
su uso interno, esta zona es la deno¬
minada variables de! sistema, esta zona
está comprendida entre la posición de
memoria 23552 hasta la 23732. Sí tenemos
un conocimiento profundo de lo que
hace cada una de esas posiciones, ten¬
dremos un poder muy grande sobre el
ordenador, pero si por el contrario no tas
conocemos podremos destruir muy
fácilmente cualquier programa que ten¬
gamos en ese momento en memoria.

En números posteriores iremos descri¬
biendo lo que hacen todas y cada una de
estas posiciones.

En este número le ha tocado el turno a
la variable CHAR5 esta variable se en¬
cuentra en las posiciones 23606 y 23607,
en estas dos posiciones de memoria está
la dirección donde se encuentra el juego
de caracteres en la ROM, esta dirección
está guardada en dos Bytes si queremos
saber cual es esta dirección tendremos
que teclear lo siguiente:

IDEAS

PRINT (PEEK 23606 + 256 * PEEK 23607) — 256

La dirección que nos dé como resulta¬
do de esta operación será la dirección
donde empieza el juego de caracteres en
la ROM. El juego de caracteres tiene una
longitud de 768 Bytes.

Variando los datos contenidos en esta
dirección podremos obtener efectos
muy interesantes.

I SE*
i se*

5 SE* i GTS i

i be* «whh

7 EEH

1 C :sSíjT 'INTSaSLCE S9HSSE '{M
15 ?0KE 23404,:

■S PPtST 4T ;í ( 0i IKi/EBSE i i A*
25 ?C*E 2549*,0

7C =S!ir *: ;C,0¡ í*ivER5E i;AC
55 35 T C 15

- R=* ftmfHf
:■ =EK t j’t I
i RES ttHWH
7

‘.5 -.íjPJT ’IHTROSJCE '¡Ai

¿0 FSP X=i T3 LEN í*-i StEF 2
25 BQÍ-E :IÍ04;3
3t Ffi-KT * T 3,A-ASIS Tú *0
55 FGicE 23é5i,í

í(! Bf.:*- A" I,K*!iAtWU T G tí*í>
50 M7T K

t-3 47 3,1 ¡AS

45 21 tC 20

sofL _

SPECTRUtl

Bailén, 20 - I o - Izda.

28005 MADRID

CUESTIONARIO LIBRERIA DE SOFTWARE

Nombre y apellido? .....

Edad .

Estudios ...

Periféricos con que cuentas ...

En tus momentos de ocio, te dedicas a:

□ Lectura

□ Televisión

□ Música

□ Cine

□ Deportes
O Otros

Opiniones sobre el contenido redacción de la revista:

Artículo Interesante Menos Interesante Sustituir

¿Compras otras revistas para el Spectrum? ¿Cuáles?

¿Eres suscriptor de alguna? ¿Cuál? .

¿Cuántas personas utilizáis el ordenador en casa?

¿Sabes programar? ...

¿Cómo has aprendido? .

¿Sólo lo utilizas para juegos? ..

¿Otras aplicaciones? ..

¿Qué tipo de programas prefieres? .

¿En este número cuáles han sido ¡os que más te han gustado? .

¿Consideras que los juegos de LIBRERIA DE SOFTWARE están a tu nivel?

¿Pierden o aumentan tu interés los programas que publicamos? .

¿Te resulta útil la revista para el aprendizaje del manejo de tu Spectrum?
¿Qué mejoras introducirías? ...

¿Os gustaría una revista con listados de programas solamente?

I

SPECTRlin

SPECTRUM

Los Micro Drives del ZX SPECTRUM
Utilización y aplicaciones

Lenguaje Máquina del ZX SPECTRUM
Subrutinas y trucos

SPECTRlin

SPECTRUM

AI incrementar la capacidad
de su Spectrum con la adición
de un Microdrive, necesita
una guía completa que le per¬
mita utilizar al máximo esta
expansión. Para ello se descri¬
ben con el máximo detalle las
técnicas de manejo de archi¬
vos y proceso de datos, de
forma que pueda escribir, leer
y cambiar datos de manera
eficaz.

Ahora puede programar en
su Spectrum una AGENDA
ELECTRONICA con listado
diario, Se incluye un listado
completo de este programa,
con el que puede introducir,
variar y borrar todos los com¬
promisos del año, permitién¬
dote obtener una copia de tos
sucesos previstos para el día,
cada manana.

Ahora tiene la posibilidad

de hacer una red de Spec- -2* :

trums con los de sus amigos, multiplicando su capacidad en
complejos juegos multiusuario. Se incluye una completa explicación
con ejemplos para explotar este aspecto.

El autor,

Richard Hurley estudió Astrofísica en la Universidad de Londres
ames de ejercer como profesor de matemáticas en Hurstpierpoint
College. En la actualidad es el responsable del Departamento de
Estudios de Ordenadores del citado centro,

Esta obra presenta de ma¬
nera progresiva el ensambla¬
dor del microprocesador Z 80
y su aplicación sobre el ZX
SPECTRUM..

Está destinada a aquellas
personas que desean saber
más sobre el funcionamiento
interno de su microordenador
para sacarle el mejor partido,
según sus posibilidades, y
aumentar la velocidad de eje¬
cución de los programas. El
ensamblador es, en efecto, el
lenguaje más rápido que el
BASIC y es el único que per¬
mite la ejecución de juegos
de acción rápida de alto nivel,

Además de las "instrucciones
abundantemente detalladas
del Z 80, este libro suministra
una serie de subprogramas
que serán excelentes ejem¬
plos para los principiantes, a
los cuales permitirá fácilmen¬
te la ejecución de complejos programas en ensamblador. Particular¬
mente explica cómo escribir o dibujar en la pantalla o en la
impresora, programar Ea salida sonora o la salida del cassette y
detectar las teclas pulsadas en el teclado.

Es un útil Indispensable para todo aquel que desee programar en
ensamblador sobre el ZX SPECTRUM,

IOS

MICRO ORIVES
Da ZX SPECTRUM

UTILIZACION Y APLICACIONES

LENGUAJE
MAQUINA DEL

* I-a mayor variedad de libros de nvi ero informa tica,
capaces de satisfacer todas sus necesidades, ya sean
profesionales, familiares, culturales...

* Todo tipo de información bibliográfica sobre micro-
ordenadores, desde AMSTRAD a Sinclair QL

TARJETA DE PEDIDO

Domicilio de envíos:

... N.°....

.. Piso.. Pta...

| C. P... Ciudad..

. Provincia....

Ruego sírvanse remitirme CONTRA REEMBOLSO los siguientes libros:

Número

Cantidad

TÍTULO Y AUTOR

Importe

Fecha.. F <to-

TU MICRO EN SU MESA

Esta mesa ocupa un espacio mínimo permitiéndote tener en un mismo espacio todo tu equipo, su
sistema de plataforma desplazable impone la distancia visual recomendada del monitor/T.V.

DIMENSIONES: Cerrada: 0,74 X 0,50 X 0,73 m.

Abierta: 0,74 X 0,84 X 0,73 m.

CARACTERISTICAS:

• Se fabrica en los siguientes acabados: Tablero bilaminado nogal, roble y blanco.

• Se entrega desarmado, en un embalaje de cartón,

• El montaje es sencillo, mediante un sistema de atornillados de alta penetrabilidad con llave exagonal
que se adjunta.

• Todo el cableado desaparece de la vista, evitándose el enredo tradicional ocasionante de caídas y
accidentes.

• El depósito de cassettes es totalmente visible y accesible.

• En la mesa auxiliar, Mod. 002, además de la impresora se pueden colocar cassettes, listados, libros,
etcétera.

CONDICIONES DE VENTA:

• El pedido será servido de forma inmediata contrareembolso siendo por cuenta del comprador los
gastos de transporte.

Distribuidor:

EDITORIAL GTS
C/. Bailón, 20. 1.° Izda.
28005 MADRID